home *** CD-ROM | disk | FTP | other *** search
- PROGRAM NAME: Label2.PRG
-
- DESCRIPTION: Program to print customized labels.
-
- ISSUE: August, 1985
- PAGE: 25
-
- SOFTWARE VERSIONS: dBASE III, versions 1.0, 1.1
-
- FUNCTION: This program prints one-across shipping labels inside a
- box.
-
- FILES NEEDED: Label2.PRG
-
- SETUP INSTRUCTIONS: To set up this program:
-
- 1. Define label spacing parameters.
-
- The table below summarizes the configurable parameters. Make
- the changes you need for the specific label definition you
- want. Be sure that the label height and width exceed the
- number and width of the print line expressions. The program
- makes no check for this.
-
- parameter variable name default value
- lines between labels between 2
- left margin lmargin 3
- label height box_h 5
- label width box_w 55
-
- 2. Define the print line expressions.
-
- This is the heart. Here, you will assign a series of memory
- variables with the prefix "exp." Each will have a suffix that
- corresponds to the number of the lines in the label. For
- lines less than 10, the suffix will have a leading zero. This
- technique allows a rudimentary form of subscripting.
-
- You must have an expression for every line of your label up to
- the beginning of the trailing lines. Trailing lines are blank
- lines that follow the last print line of your label but are
- within the box. You need not concern yourself about them, as
- they are calculated. Embedded blank lines, however, must be
- accounted for with an expression. For example:
-
- +------------------------------+
- | Ship to: Fred |<--- exp01
- | |<--- exp02
- | From : D. Base |<--- exp03
- | |<--- Trailing lines
- +------------------------------+
-
-
- To create a blank line, assign to the print line variable a
- null value. For example:
-
- exp02 = ""
-
- To assign a non-blank print line expression, assign the
- appropriate line variable with an expression that returns what
- you wish to see in your label. The major limitation is that
- the expression must evaluate to character type.
-
- Last, you must assign the memory variable, nexp, with the
- number of print line expressions you have defined.
-
- 3. Define box characters:
-
- You can assign different characters for the label box. This
- is entirely optional and is up to your discretion.
-
- To run Label2.PRG you must pass PARAMETERS to it. They are,
- in order of passing: database filename, index filename, FILTER
- condition, and printer toggle. The syntax is as follows:
-
- DO Label2 WITH <expC>,<expC>,<expC>,<expC>
-
- A typical example:
-
- DO Label2 WITH "Yourfile","Yourndx","Shipto='Ashton-Tate'","Y"